home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_shw_riverthrust.cog < prev    next >
Text File  |  1999-11-15  |  2KB  |  71 lines
  1. # Jones 3D Cog Script
  2. #
  3. # shw_river_thrust.cog
  4. #
  5. # River Thrusting Script
  6. #
  7. # [CMG]
  8. #
  9. # (C) 1997 LucasArts Entertainment Co. All Rights Reserved
  10. # ========================================================================================
  11. symbols
  12.  
  13.         message user0
  14.         
  15.         sector  sect0
  16.         sector  sect1
  17.         sector  sect2
  18.         sector  sect3
  19.         sector  sect4
  20.         sector  sect5
  21.         sector  sect6
  22.         sector  sect7
  23.         sector  sect8
  24.         sector  sect9
  25.         sector  sect10
  26.         sector  sect11
  27.         sector  sect12
  28.         
  29.         vector  vec0
  30.         vector  vec1
  31.         vector  vec2
  32.         vector  vec3
  33.         vector  vec4
  34.         vector  vec5
  35.         vector  vec6
  36.         vector  vec7
  37.         vector  vec8
  38.         vector  vec9
  39.  
  40.         
  41. end
  42.         
  43.  
  44. # ========================================================================================
  45. code
  46.  
  47. user0:
  48.         
  49.         print("river0 user0 received");
  50.         Setsectorthrust(sect0, vec0, 2);
  51.         Setsectorthrust(sect1, vec1, 2);
  52.         Setsectorthrust(sect2, vec2, 2);
  53.         Setsectorthrust(sect3, vec2, 2);
  54.         Setsectorthrust(sect4, vec3, 2);
  55.         Setsectorthrust(sect5, vec4, 2);
  56.         Setsectorthrust(sect6, vec4, 2);
  57.         
  58.         #sluice sector
  59.         Setsectorthrust(sect7, vec5, 2);
  60.         
  61.         Setsectorthrust(sect8, vec6, 2);
  62.         Setsectorthrust(sect9, vec7, 2);
  63.         Setsectorthrust(sect10, vec8, 2);
  64.         Setsectorthrust(sect11, vec9, 2);
  65.         
  66.         
  67. return;
  68.  
  69. end
  70.         
  71.